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1. ABSTRACT 



THIS PROGRAM IS INTENDED AS A BRUTE FORCE ROUTINE 

TO EXECUTE AN OPERATION OR SERIES OF OPERATIONS, CONTINUOUSLY 

REGARDLESS OF THE RESULTS OF THE OPERATION. BECAUSE 

OF THE COMPLEXITY OF THE TU45 HAG TAPE SYSTEM AS 

OPERATED ON THE MASSBUS. IT IS NOT ALWAYS POSSIBLE TO 

PROVIDE FOR EVERY CONTINGENCY IN THE NORMAL PROGRAMS. 

THEREFORE THIS UTILITY DRIVER WILL ALLOW AN OPERATOR 

TO EXECUTE ANYTHING DESIRED IN ANY ORDER. THERE ARE 

NO ERROR CHECKS OR PRINTOUTS MADE, AND ANY VARIATION 

FROM PRESET SEQUENCES AND VALUES ARE MADE BY 

CHANGING THE APPROPIATE MEMORY LOCATIONS. 

2. REQUIREMENTS 



2 . 1 HARDWARE : 

A. ANY PDP-11 PROCESSOR 

B. RH MASSBUS CONTROLLER 

C. TH02 MAG TAPE CONTROLLER 

D. AT LEAST ONE (1) TU45 SLAVE 

2.2 STORAGE: 

THIS PROGRAM REQUIRES AT LEAST 1K OF CORE 
3. LOADING PROCEDURE: 



USE STANDARD BINARY LOADING PROCEDURE 
4. STARTING PROCEDURE 



THE PROGRAM IS ALWAYS STARTED AT LOCATION 200 (8) 
5. CONSOLE SWITCH SETTINGS 



IF A CONSOLE SWITCH REGISTER IS NOT PRESENT, THE FOLLOWING 
PROCEDURE MUST BE IMPLEMENTED: 

A) LOAD ADDRESS 636(8) LABELLED "SWR" 

B) DEPOSIT THE VALUE 176(8) 

C) LOAD ADDRESS 176(8) 

D) DEPOSIT THE DESIRED SWITCH VALUE. 

SW15: 1=STOP AFTER EACH OPERATION 
0=PROCEED 

SWH: 1=STOP AT THE END OF THE OPERATION SEQUENCE 

0=PROCEED 
SW13: UIGNORE END OF TAPE (EOT) 
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6. 



(PAGE 2) 
OPERATION 



THE PROGRAM OPERATION IS QUITE SIMPLE , BUT DOES 
REQUIRE THE OPERATOR TO HAVE KNOWLEDGE OF THE 
TU45 TAPE SYSTEM AS OPERATED ON THE RH MASSBUS 
CONTROLLER. THE OPERATOR MUST BE ABLE TO DECIDE 
WHICH SEQUENCE OF OPERATION IS REQUIRED. AND 
WHAT VALUES TO ASSIGN TO THE VARIOUS PARAMETERS 
REQUIRED TO EXECUTE THEM. THE OPERATION SEQUENCE 
IS SET UP BY LOADING A TABLE WITH THE FUNCTION 
CODES OF THE DESIRED OPERATIONS AND SETTING THE 
NUMBER OF OPERATIONS IN A COUNTER. THE PROGRAM IS 
SET UP TO DO A WRITE OF TEN (8) WORDS OF ALL 
ONES DATA TO SLAVE ZERO (0) ON DRIVE ZERO (0) IN 
PE (1600 BPI) WITH A NINE TRACK NORMAL DATA FORMAT. 
THE DATA ADDRESS IS 3000 (8). THE OPERATION SEQUENCE 
IS SET TO DO A SINGLE WRITE. IF LOADED AND STARTED 
AT 200 (8) WITH NO CHANGES MADE AND SWITCH 14 AND 15 
SET TO A ZERO (0), THIS OPERATION WILL BE EXECUTED 
CONTINUOUSLY. 

THE FOLLOWING IS THE LIST OF PARAMETERS WHICH MAY 
BE VARIED AND A DESCRIPTION OF EACH ALONG WITH THEIR 
CORE LOACATION: 



PARAMETER 
RH ADDRESS 
DRIVE NUMBER 



LOCATION 

600 

700 



UNIT DESCRIPTION 702 

FRAME COUNT 704 

WORD COUNT 706 

READ ADDRESS 710 

WRITE ADDRESS 712 

READY DELAY 714 

READY MULTIPLIER 716 



DESCRIPTION 

ADDRESS OF RH (THE FIRST REGISTER ADDRESS: CS1 ) 

SET TO SELECT TH02 NUMBER ADDRESS 0-7 

SET SELECTED SLAVE NUMBER (0-7) IN BITS 0.1.2 
SELECT PARITY IN BIT 3 (0=ODD 1=EVEN) 
SELECT DATA FORMAT IN BITS 4.5,6.7 
SELECT DENSITY IN BITS 8.9.10 

SET NUMBER OF FRAMES TO WRITE PER WORD COUNT AND FORMAT 
IN TWOS' COMPLIMENT 

SET NUMBER OF WORDS TO BE TRANSFERRED IN TWOS' COMPLIMENT 

SET DESIRED ADDRESS FOR START OF READ BUFFER. 

SET DESIRED ADDRESS FOR START OF WRITE BUFFER. 

THIS DELAY VALUE IS USED BY THE PROGRAM TO ESTABLISH 
A MAXIMUM TIME TO AWAIT THE COMPLETION OF AN OPERATION 

BEFORE PROCEEDING TO THE NEXT. "(DEFAULT IS APPROX 435 MS FOR PDP-11/20)** 

IF THE VALUE SET INTO 714 DOES NOT ALLOW ENOUGH TIME, 
INCREASE THE SIZE OF THE MULTIPLIER. EACH INCREMENT OF THE 
MULTIPLIER WILL CAUSE THE 714 DELAY TO BE EXECUTED 
THAT MANY MORE TIMES. 
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OPERATION DELAY 720 

OPER MULTIPLIER 722 

OPERATION NUMBER 724 

OPERATION TABLE 726-756 



THIS DELAY IS USED TO ALLOW FOR SOME AMOUNT OF 
TIME BETWEEN THE EXECUTION OF EACH OPERATION. IT IS 
LOADED AND USED JUST AS IN THE READY DELAY(7K) 
••(DEFAULT IS APPROX 54 MS FOR PDP-11/20)** 

THIS IS USED JUST AS THE READY DELAY HULTIPLIER(716) 

THIS IS THE NUMBER OF OPERATIONS TO BE PERFORMED 
IN A SEQUENCE AND SHOULD REFLECT THE NUMBERS 
OF OPERATIONS SET INTO THE OPERATION TABLE. 

THIS TABLE (CONSISTING OF 15 LOCATIONS) IS TO BE 

LOADED WITH THE FUNCTION CODES FOR EACH OPERATION 

TO BE PERFORMED IN SEQUENCE. THE NUMBER OF ENTIRES 

MAY BE FROM ONE (1) TO FIFTEEN (15). MAKE SURE THAT 

THE NUMBER OF FUNCTION CODES SET IN THE TABLE IS REFLECTED 

BY THE NUMBER IN LOCATION 724 (OPNUM) 



6.1 FUNCTION CODES 



20=READ IN PRESET 
02=REWIND-0FF LINE 
06=REWIND 
10=DRIVE CLEAR 
26=WRITE TAPE MARK 
24=ERASE 

30=SPACE FORWARD 
32=SPACE REVERSE 
50=WRITE CHECK FORWARD 
56=WRITE CHECK REVERSE 
60=WRITE FORWARD 
70=READ FORWARD 
76=READ REVERSE 
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6.2 DATA FORMATS (BIT 7.6,5.4 OF UNIT DESCRIPTION) 

14=NINE TRACK NORMAL : 2 FRAMES PER WORD 
15=C0RE DUMP: -4 FRAMES PER WORD 

6.3 DENSITY (BITS 10,9.8 OF UNIT DESCRIPTION) 

4=1600 BPI:PE (PE USES ONLY ODD PARITY) 
3=800 BPI:NRZI 
2=800 BPI:NR2I 
1=556 BPI:NR2I 
0=200 BPI:NRZI 

6.4 PARITY (3IT 3 OF UNIT DESCRIPTION) 

1=EVEN PARITY 
0=ODD PARITY 

6.5 SLAVE SELECT (BITS 2.1.0 OF UNIT DESCRIPTIONS) 
SET TO DEVICE SLAVE ADDRESS (0-7) 



SEQ 0008 
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7. PROGRAM DESCRIPTION 

IN ORDER TO MAINTAIN THE CONTINUOUS EXECUTION OF 
THE OPERATIONS DESCRIBED THE PROGRAM IS ORGANIZED AS 
FOLLOWS: 

START 

INITIALIZE THE RH 

SET UP TAPE PARAMETERS (DENSITY. PARITY. FORMAT: WORD COUNT, FRAME COUNT. BUS ADDRESS) 

SELECT DEVICE TO TEST (DRIVE NUMBER. SLAVE NUMBER) 

EXECUTE OPERATION (SET FUNCTION AND FROM OP TABLE AND SET G0=1) 

AWAIT END OF OPERATION (READY DELAY) 

STOP IF SWITCH 15=1 

DO OPERATION DELAY (OP DELAY) 

STOP IF LAST OPERATION IN SEQUENCE AND SWITCH 14=1 
POINT TO NEXT FUNCTION CODE IN OP TABLE 
JUMP BACK TO START 

7.1 FLOW: START : HOUSEKEEPING 

INI T : CLEAR MASSBUS AND TM02 

SET UP: SET UP REQUIRED REGISTERS 

EXECUTE: SET FUNCTION AND G0=1 

AWAIT END: LOOP ON DRY=1 AS LONG AS ALLOWED BY READY DELAY 

STOP: IF SWITCH 15=1 

DELAY : PER OP DELAY 

END OF RSEQUENCE? IF NOT JUMP TO START 

STOP: IF SWITCH H=1 

JUMP TO START RESTART SEQUENCE 

7.2 VARIATIONS: THERE ARE TWO VARIATIONS MADE FROM THIS FLOW. 

BOTH ARE CAUSED BY A PARITCULAR FUNCTION CODE. 

IF A READ REVERSE IS TO BE EXECUTED, THEN THE 

BUS ADDRESS IS INCREMENTED BY THE SIZE OF THE 

RECORD BECAUSE THE DATA IS LOADED INTO MEMORY 

IN REVERSE (I.E: HIGH ADDRESS TO LOW ADDRESS) 

THE SECOND VARIATION IS CAUSED BY A SPACE (FORWARD OR REVERSE) 

OPERATION AND IT IS THAT THE FRAME COUNTER IS SET TO A -1 

SO THAT ONLY ONE (1) RECORD IS SPACED OVER. IF YOU WISH 

TO SPACE OVER MORE THAT ONE (1) RECORD, SET LOCATION 1100 (8) 

TO THE TWOS' COMPLIMENT OF THE NUMBER OF RECORDS DESIRED. 

8. LISTING 
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UDES: 
FCNT : 
WCNT : 
RADDR: 
WADDR : 
RDYDLY: 
RDYDX: 
OPDLY: 
OPDX: 
OPNUM: 
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.=700 

.-SET PARAMETERS DESIRED FOR UNIT UNDER TEST* 

0 ; DRIVE NUMBER 
2300 .-SLAVE DESCRIPTION 
-20 ; FRAME COUNT 

-10 ;W0RD COUNT 

2000 .-READ ADDRESS 

3000 ; WRITE ADDRESS 

100000 ; READY DELAY 

1 .-READY DELAY MULTIPLIER 
10000 .-OPERATION DELAY 

1 .-OPERATION DELAY MULTIPLIER 

1 ; NUMBER OF OPERATION (1 TO 15) 

.-OPERATION TABLE********** 

.-ENTER OPERATION SEQUENCE DESIRED. 

.-MUST HAVE AT LEAST 1 OPERATION. AND 

.HAY HAVE UP TO 15(8). 

.-SET THE OPERATION COUNTER EQUAL 

;TO THE NUMBER OF OPERATIONS IN 

; THE SEQUENCE. 

■20 = READ IN PRESET 

.02 = REWIND-OFFLINE 

;06 = REWIND 

;10 = DRIVE CLEAR 

;26 = WRITE TAPE MARK 

;24 = ERASE 

;30 = SPACE FORWARD 

;32 = SPACE REVERSE 

;50 = WRITE CHECK FORWARD 

;56 = WRITE CHECK REVERSE 

;60 = WRITE FORWARD 

;70 = READ FORWARD 

;76 = READ REVERSE 

60 

0 

0 

0 

0 

0 

0 .-FILL WITH OPERATION SEQUENCE 

0 
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WORD COUNT 
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SET OP CODE 

SEE IF SPACE FORWARD 

IF SO: BR 

SEE IF SPACE REVERSE 
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SET T0SPACE ONE RECORD 

SEE IF READ OP 
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SET WRITE ADDRESS 

SET READ ADDRESS 

SEE IF READ OPERATION 
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GET FRANE COUNT 

SET BUS ADDRESS FOR READ REVERSE 
SET GO BIT 



.START OPERATION 



;SET DELAY NULTIPLIER 
; SET READY DELAY 

;IF DRY: BR 



; DELAY FOR DRIVE READY 

; SEE IF STOP ON OPERATION 
;1F NOT: BR 



;SET DELAY NULTIPLIER 
;SET OPERATION DELAY 



.-DELAY BETWEEN OPERATIONS 
;G0 SEE IF REWIND 
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A 


IF SEQUENCE NOT DONE : BR 


453 
454 


001266 


032777 


040000 


177342 




BIT 


#40000. aSUR .SEE IF HALT ON SEQUENCE 


455 


001274 


001641 








BEQ 


START 




456 


001276 


000000 








HALT 






457 


001300 


000167 


177474 






JHP 


START 




458 


















459 












;RH REGISTER SETUP********** 


460 


















461 


001304 


000240 






SETUP: 


NOP 






462 


001306 


016701 


177266 






MOV 


C1.R1 ; 


GET ADDRESS OF CS1 


463 


001312 


012700 


00001 5 






NOV 


#15, RO 


SET NUMBER OF REGISTERS 


464 


001316 


012702 


000602 






MOV 


#WC,R2 


GET FIRST ADDRESS 


465 


001322 


062701 


000002 




SETA: 


AOO 


#2.R1 


INCREMENT 


466 


001326 


010122 








NOV 


R1.(R2)+ 


LOAD ADDRESS 


467 


001330 


005300 








DEC 


RO 


SEE IF DONE 


468 


001332 


001373 








BNE 


SETA 


IF NOT: BR 


469 


001334 


000167 


177440 






J HP 


START 


ELSE GO START EXECUTION 


470 


















471 












; REWIND 


FROM EOT (PER SW13) 


472 


















473 


001340 


032777 


020000 


177270 


RUND : 


BIT 


• cUUUU ,ibWK 


• CCC IC IRiinDC CAT 
ott IT lbNUHC tUI 


474 


001346 


001033 








BNE 


RUNDX 


; IF. SO: BR 


475 


001350 


032777 


002000 


177234 




BIT 


#2000. 8DS 


;SE| IF AT EOT 


476 


001356 


001427 








BEQ 


RUNDX 


;IF*NOT: BR 


477 


001 360 


012777 


000040 


177222 




MOV 


#40.acs 


;In£t 


478 


001366 


016777 


177306 


177214 




MOV 


DRVN.aCS 


; SET DRIVE NUMBER 


479 


001374 


016777 


177302 


177230 




hov 


UDES,aC2 


; SET SLAVE NUMBER 


480 


001402 


012777 


000007 


177170 




MOV 


#7.aci 


; START REWIND 


481 


001410 


032777 


000200 


177174 


RWNDA: 


BIT 


#200. aos 


;SEE IF DRY 


482 


001416 


001774 








BEQ 


RUNDA 


;IF NOT: BR 


483 


001420 


032777 


020000 


177164 


RWNDB: 


BIT 


#20000. aos 


;SEE IF PIP RESET 


484 


001426 


001374 








BNE 


RWNDB 


;IF NOT: BR 


485 


001430 


005726 








TST 


(SP) + 


; RE SET STACK 


486 


001432 


000167 


177342 






JHP 


START 


.-RESTART SEQUENCE 


487 


001436 


000207 






RUNDX : 


RTS 


PC 


.•RETURN 


488 


















489 




002000 








.=2000 






490 




000100 








.REPT 


100 




491 












0 






492 












.ENDR 






493 


















494 




003000 








.=3000 






495 




000100 








.REPT 


100 




496 












Mim 






497 












.ENDR 






498 


















499 




000001 








.END 







(r 



B 2 
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SYMBOL 


TABLE 




A 001022 


cc 


000620 


ER 


000614 


AA 001076 


CS 


000610 


EO 


001242 


AS 000616 


C1 


000600 


FC 


000606 


AO 001104 


C2 


000632 


FCNT 


000704 


A1 001122 


D 


001232 


MR 


000624 


A3 001150 


DB 


000622 


OPDLY 


000720 


B 001200 


DRVN 


000700 


OPDX 


000722 


BA 000604 


DS 


000612 


OPNUH 


000724 


BO 001174 


DT 


000626 


OPTBL 


000726 


C 001222 


E 


001246 


PSU 


000634 



. ABS. 003200 000 



ERRORS DETECTED: 0 

,CZTUAA.SEQ/S0L.CZTUHA.P11 
RUN-TIME : 2 4 .2 SECONDS 
RUN- TIME RATIO: 9/7=1.3 
CORE USED: 5K (10 PAGES) 



RADDR 000710 

RDYDLY 000714 

RDYDX 000716 

RVND 001340 

RUNDA 001410 

RUNDB 001420 

RWNDX 001436 

SETA 001322 

SETUP 001304 

SN 000630 



START 001000 

SUR 000636 

UDES 000702 

UADDR 000712 

UC 000602 

UCNT 000706 

= 003200 



